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Id 60 seconds for input of master tape and 15 
sconds for parameters and communalitieB 





PARAMETER TAPE: 



The parameter tape consists of three unsigned decimal 
numbers separated "by fifth-hole characters in the 
following order: 



f space 
df space 
dr space 



f - factors to "be extracted 

df - digits to be punched in factors 

d^ - digits to "be punched in residuals 



Both d f and d r may be set to any value less than 12, but 
the results are accurate to 8 decimal places only. The 
value of f must be less than 100. If f = 0, no factor 
extraction will take place. If d f = 0, and f f 0, the 
factors will be calculated, but not punched. Only the 



table of variance removed will be printed 
the residual matrix will not be punched. 



If d, 



0, 



COMMONALITIES TAPE: 



CORRELATION TAPE; 



OPERATOR TAPE: 



The communalities tape consists of positive signed fractions 
scaled by 10" 1 . There must be exactly n numbers on the 
tape, and the final number must be terminated by an N. 

The correlation tape ia the lover triangular matrix output 
of K-8, K-9, or any other triangular matrix of correlations. 
This tape consists of n(n + l)/2 signed fractions scaled by 
10" 1 . The numbers are punched by rows (i.e., rQO, riQ, 
r ll "• r n-l> n-l)* The diagonal entries must be present, 
but it is unimportant what these are, for they are replaced 
by the communalities. 

The operator tape is a record of the reflection process. 
At the beginning o% a factor extraction no operator tape is 
required, for no reflection has taken place. For the 
extraction of subsequent factors on the same data, see 
part C under Methods of Use. Rart of the output of each 
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problem consists of this operator tape, so as to permit 
subsequent continuation of the problem. 

METHODS OF USE: A. To extract f factors and punch out residuals 

Stops 

1. Master tape 24190 

2. Parameter tape 24l4L 

3. Communalities 34l8S 

4. Correlations 24190 

At the conclusion of step 4 at stop 24190, another problem 
can be begun by returning to step 2 and raising the black 
switch. 

B. To extract f factors without residual correlations r set 
d r = 0, and follow steps 1-4 as in A. The final stop will 
be 240S2. At this point either a nev problem can be 
begun or an additional factor can be extracted. 

(1) To begin a new problem raise the black switch. The 
machine will stop on 24190 • Repeat steps 1-4 as in A. 

(2) To extract an additional factor, raise the White 
switch. After the next factor is calculated, the machine 
will again stop on 240S2. This option may be repeated as 
many times as desired, each time by raising the white 
switch. 

^ • Si extract £ more factors on a subsequent machine run , 
first clear the machine as at the beginning of a new 
problem and read the operator tape. The machine will stop 
on 2405J« Next read the master tape, and repeat steps as 
in A, substituting the residual communalities and res id usj. 
correlations jBor the original data. 

"XAMFLE: A four -variable example is shown below. 

2 space 3 space 3 space Parameter tape 

+1+1+1+1N Communalities 

+100 Correlations 

+040+100 

-055+023+100 

-036-030-012+100 

Results, Factor I 
+0.90 
+O.58 
-0.47 
-O.6O 
N 

-0.28 Factor II 

+O.56 
+0.82 
-0.5^ 

N Table of Per Cent of Variance 

Removed 

NO ROOT PC OF V CUM PC 

01 +01.73^ +043.361 +043.361 

02 +01.358 +033.959 +077-320 
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EXAMPLE, continued. 



GENERAL REMARKS: 



Residual Communalities 



Residual Correlations 



Operator Tape 



RESIDUALS 

+0.10 

+0.35 
+0.10 
+0.35N 

+0.10 

-0.04 +0.35 
-0.10 +0.0*4- +0.10 
+0.0^ -0.35 -0.04 +0.35 

OO689+ 

80F00 001F 

00F00 000F 

00F00 002F 

80F00 001F 

2*4-999N 

The purpose of the centroid program is to decompose a matrix 

of correlations, R( n ), to a set of f linearly independent 
effects or factors. The program calculates the factor 

matrix, F, such that 

.R(n) =F F' + R( n _ f ) 

where R( n -f) is the matrix of residual effects. Attempts are 
often made to reduce the size of the elements of R(n-f ) "by 
introducing communalities estimates which replace the diagonaj 
entries of R. This program is called the fixed communalities 
program to distinguish it from other programs which contin- 
uously re-estimate the diagonal entries during the course of 
the calculation. 

The kth factor is obtained merely by dividing the column sums 
of R(n-k) *>y tne square root of the total sum of elements of 
R(n-k)5 i- e «* , N If 7~~ 



j 



i j 



The centroid of a set of points is the center of gravity of 
equal weights at the points. If the axes are so placed that 
the centroid lies in the first axis of reference, then the 
centroid has zero projections on all the remaining coordinate 
axes. It is necessary to rearrange the points to proceed 
with successive factor extractions. The method chosen here 
is called the reflection process. To insure that successive 
effects to be removed from R are nearly as large 
as the method permits, whenever the column sum associated 
with a variable is negative (excluding the diagonal entry), 
the correlations associated with this variable are changed 
in sign. The process continues until all of the column sums 
are either positive or zero. Reflection occurs prior to the 
extraction of each factor including the first one. It is 
not necessary for the factor analyst to take this process 
into account, for a set of operators within the memory keep 
track of the bookkeeping. The factor loadings which are 
punched out carry the correct sign which is consistent with 
the original R-matrix. 
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iFNERAL REMARKS, continued. 



N--.TE 1: 



NOTE 2: 



For further discussion of the method, see L.L. Thur stone, 
Multiple Factor Analysis , University of Chicago Press, d- 1 7, 
pages 149-75. 

If the routine stops on an FF order from location 026, raise 
the white switch. The routine will then print out the per 
cent of variance removed, the residual communalities, and the 
residual correlations. A stop on an FF order may he due to 
any of the following troubles: (l) overfactoring, (2) under- 
estimation of communalities, (3) R-matrix is non-Gramian, 
(4) machine errors, and (5) errors in data tapes. 

If the routine stops on an FF order from location 04j, this 
indicates a failure in transferring order? from the drum to 
the William's Memory. 
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(8) 
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*y (n) 



Centrold Factors 
Fixed CooEaunalitias 



003K 
OOF OOF 
OOF OOF 
OOF OOF 
OOF OOF 
OOF 0064F 
OOF OOF 
OOF OOF 
OOF OOF 
OOF OOF 
00467F 00467F 
00578F 00578F 
OO689F 00689F 
80F 001F 
00800F 00800F 
009HF 00911F 
8511F 002659F 
OOF OOF 
OOF OOF 
8511F 002560F 



by 13(11) 
by 17(11) 



OOK 

OOF OOF 

OOF 001000 0000 OOOOJ 

oof 006250 0000 OOOOJ 

OOF 003F 

OOF OO67F 

OOF 0070F 

kQF L521(N12) 

26 (KL) oof 

OIF OOF 



Title 



Factors 

Decijmal places in factors 

Decimal places in residuals 

Order of matrix 

Ho. of words per track 

Row number 

Column number 

Temporary storage 



Location of drum addresses for vector "J" 

Location of vector "J" 

Store of operators 

Control of operators 

Store of communalities 

Store of column sums and factor loadings 

Store of r-matrix on drum 



KSL 1.20 



(DO) - 65 

(DO) » 4289 

Store of roots on drum 



Always zero 

ID' 1 

2- k X 10 +1 



Used to calculate print parameter 

Used in drum add. routine I 

Number of digits per line of teletype 

Test for (H12) 

To transfer out of (KL2) 

To change drum read order to store order 



^tOCATION 


ORDER 




NOTES PAGE 2 


XSL 1.20 


Abs. 


Rel. 


Sym. 


OOF OOF 


by 26(11) 






31 




(9) 


Maximum number of residuals per line 


52 




(10) 


OOF 0010F 




Test on input of parameters | 


55 




(11) 


OOF OOF 


by 11(12) 


Sum of ccmmunalities x 10~ 2 x 2~ 2 


54 




(12) 


OOF OOF 


by 6(12) 


(N) - 1 




j 35 




(13) 


OOF OOF 




Temporary storage 




1 56- 




(14) 


OOF OOF 




it 11 




i 37 




(15) 


001F 001F 




To increase addresses 




3 1 




(16) 


FFF 26 (M5) 




Error stop; vhite switch to end of pro) 


1 59 ! 




(17) 


OO96IF OO96II 




To adjust (Pi) 




40 




(18) 


00642F 006431 




To adjust (Pi) 




i 4i 




(19) 


OOF OOF 




Temporary storage for print of table 






(20) 


OOF OOF 




IT tl II It It II 


43 




(21) 


OOF OOF 




II tl It It If II 


44 




(22) 


OOF OOF 




ft !t ft ft fl tt 


45 




(n) 


OOK 




To transfer words to and from drum 

■ 








OOK 




1 

To place input routine in memory 


85 





(Ml) 


50335F 50L 










I 




26 (Yl) 002660F 






■ 


2 




0065F 9259F 










3 




50400F 503L 










4 




26 (Yl.) 002726F 








5 




0062F 24(11) 




Stop for insertion of parame"t 


;er tape 


i 


1 




OOK 




Read last correlation 




91 





(WE) 


914F 36L 


from 24 (Hi) 






. 


1 




9i4F 361L 














OOK 




To place 




93 







50535F 50L 




portions of factor extraction 




1 




26 (Yl) 002792F 


routine in memory 






2 




0061F 4l(l9) 










3 




50400F 503L 










4 




26 (Yl) 002858 


F 








5 




0040F 26 (M3) 








' 






OOK 








99 





(M3) 


L5(D3) 402(m6) 


Preset drum add. for store and read 








1 


1 





LocAsrabir order 


NOTES PAGE 3 


KBL 1.20 


Abs. 


Rel. 1 


3ym. 


l4(8) ko6X*k) 




of roots 






1 


> 






2 




L5(l8) 466 (Pi) 




Adjust (Pi) 






3 




4222 (Pi) 4l(20) 








4 




4l(2l) 4l(22) | 








5 




L3(F) 36(M9) 
00K 




Test: (F) = 
life in routine 




105 



1 
2 

3 
1* 
5 


(A) 


92135F 50L 
26(SJ) 501L 
26 (RF) 4lF 
9259F 503L 
26 (CL) 504L 
26 (PL) L5(l4) 




Column sums 
Reflection process 

Calculate factor loadings 
Print factor loadings 






6 




OOF OOF 


by 1(M3) 


Drum address 






7 




F56L 4o6l 




for store of root 






8 




50(0) 508L 










9 




26 (rc) 509L 










10 




26(RR) F5(19) 




Residual communalities 




■ 


11 




42(19) lo(f) 




Residual correlations 






12 




36 (M5) 26L 




Test for end of factor extraction. 








OOK 








118 





(M5) 


92135F 922 59F 


from 12 (M4) 


Title for table of variance 




1 




92965F 92770F 










2 




92578F 92965F 










3 




92258F 92582F 








. 


l* 




92322F 92977F 










5 




922F 92835F 










6 




92961F 92578F 










7 
8 

9 

10 
11 

12 




92898F 92961F 
92323F 92977F 
92835F 92450F 
92643F 9296IF 
922F 92835F 
92707F 92519F 









LOCATION ORDER 




NOTES PAGE k 


KBL 1.20 


Abs. 


Rel. 


Sym. : 


OOK 




Take roots off drum 






.' 


i 




131 



1 


(MS) 


L5(S) 42 3L 
421 (M7) 92135F 










2 




OOF OOF 


by 0(H5) 


Drum address 






3 




22 3L 40F 


by 0(M5) 








4 




F52L 402L 










5 




F53L 42 3L 










6 




F5(22) 42(22) 










7 




LO(F) 36 (M7) 










8 


262 L OOF 








j 






OOK 




Print table of variance 




! 

i . ■. ., 
1 ;40 
! 



1 
2 


(M7) 


L5(17) 466 (PI ) 
4222 (Pi) L5F 
40 (K) F5(2l) 








. 


3 


J022F 503L 










4 


26 (Pi) L5(l8) 




Factor number 




5 




466 (Pi) 4222 (Pi) 








6 




L5(K) 002F 










7 




5252F 507L 










8 




26 (Pi) 92961F 




Root 






9 




L5(K) 66(11) 








. 


10 
11 
12 

13 
14 




75(1) 40 (jt) 
5263F 5011L 
26 (Pi) 92965F 
L5(JT) L4(20) 

40(20) 50(1) 




Per cent of variance 






15 




5263F 5015L 




Cumulative per cent of variance 




16 




26 (Pi) 92131F 










17 




92515F F51L 










18 




421L F5(2l) 










19 




42(21) LO(F) 








; 


20 




36(M7l) 26L 
OOK 








l6l 




tm) 


92135F 92259F from 20 (M7) 

1 







LOCATION 



Abs. 



162 



Yfk 



Rel. 



1 
2 

3 
k 

5 

6 

7 
8 

9 
10 
11 



1 

2 

3 

k 

5 
6 

7 

8 



183 



211 



Sym, 



(M8) 




1 
2 
3 

5 
6 



(M9) 



(Pi) 
(VI) 



ORDER 



OOK 

9259F 92135F 
L3(D> 56 (M9). 
L5 (C ) 424L 
15(D) 466l 
ifl(l) 50F 
75(2) OO^F 
52F 506L 
26 (Pi) F5^L 
if2^L F5(I) 
42(l) LO(N) 
3211L 92131F 
22^L 92770F 

OOK 

L3(R) 367L 
50335F 501L 
26 (Yl) 0029901 
OO^OF 92139F 
50400F 50^L 
26 (Yl) 0030565 
0030F 26 (PR) 
F5(F) 42(F) 
24lL 26 (vik) 

OOK 

Insert (Pi) 

OOK 

K5F H230L 
L5(A) 4212L 
422 3L IA(12) 
4231L L5(V) 
4226L 41(1) 
50 (J) 75 (T) 
S5F 4o(JT) 



by 2L 



from l(W) 



from 6(SJ) 
or 21 (RF) 



NOTES PAGE 5 



Print residual 
conmmnalities x 10 



KSL 1.20 



To place routine to 

print residuals in 

memory 

To test: (R) = 



If (R) = 0, option: black switch yields 
ne-w problem, vhite switch calculates 
another factor. 

Print routine 



Routine to pre-calculate 
addresses of vector "j " 
and read a column from a 
triangular matrix stored on drum 



LOCATION . ORDER 


>■ 


NOTES PAGE 6 


KSL 1.20 


Abs. 


. Rel 


• Sym 


• 










7 




L5(I) 10 (J) 






.8 




4o(k) 3619L 










9 




L5(J) L0(4) 










10 


3216L L5(JT) 










11 




l4(di) l4(j) 








j 


12 

13 
14 

15 
16 

17 

18 




L4(l) 40F 
F512L 4212L 
F5(I) 42(1) 
L0(N) 322 3L 
267L 50(0) 
L5(JT) OOIF 
L4(D2) 2211L 


by l(Vl) 


Drum order for element i^ j 




i 


19 




L1(K) 3614L 










20 




50(1) 75 (T) 










21 




S5F 40(JT) 








! 


22 




L5(I) 229L . 








I 


23 




OOF L5F 








! 


24 




4025L 3225L 








25 




OOF OOF 


by 24L 


Drum address 






26 




3226L 40F 


by 4L 


Store 






27 


J F526L 4226L 










28 


F523L 4223L 










29 




L031L 3223L 










30 




OOIF 22F 










31 




80F L5F 












OOK 




Reflect vector "j" 




243 




1 
2 

3 
4 

5 
6 


(RN) 


K5F 4216L 
L5(A) 426l 
42 7L 4210L 
L4(12) 4218L 
L5(V) 4211L 
L4(12) 4217L 
50(0) L5F 


from 22 (RF) 
by 11 (RN) 


and replace on drum 




. 


7 




L4(8) 4of 


by2(RN) 






!._ 


8 




F56L 426l 











LOCATIGW ORDER 


* 
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KSL 1.20 




Abs. 


Rel. 


Sym. 


42 7L L018L 












9 










10 




326L L5F 












11 




4012L L1F 












12 




OOF OOF 


by 11 (RN) 


Drum address precalculated 








15 




F510L 4210L 












14 




F511L 4211L 












15 




L017L 3210L 












16 




001F 22F 












17 




N012L L1F 












18 




J0(0) L5F 
OOK 




Calculate column sums 






262 




1 

2 

5 
4 

5 
6 

7 
8 

9 

10 
11 


(SJ) 


K5F 4215L 
L5(S) 4212L 
41 (J) 41(13) 
F5(13) 42(13) 
L5(V) 426L 

4l(l4) 505L 

■ 

26 (Vl) L5F 
L4(l4) 4o (14) 
F56L 426L 
F5(13) 42(13) 
lo(n) 3612L 

226L OOF 


from l(M4) 
by 4(M4) 










12 




L5(l4) 40F 


by 1(SJ) 


Column sums at (S) 








13 




F512L 4212L : 












14 




F5(J) 42 (J) 












15 




LO(N) 32F 












16 




222L. OOF 
OOK 




Reflection process 






279 




1 
2 

3 

4 


(RF) 


K5F 4218L 

Mft) L5(S)- 
40F 402F 
425L 46% 
4229L 4629L 


from 2(M4) 


continue to reflect until aJJ 
column sums are positive 






5 






L1F L4F J by 3(RF) 


Select lowest column 





LOCATION ORDER 


» 
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Abe. 


Eel. 


Sym. 


369L L52F 




sum, S 
J 




6 


- 




7 




40F 0020F 




j 


8 




46% 265L 






? 


9 




F52F 422F 






1 10 




k2yL F5(I) 




I 


1 


11 




42(1) IX) (N) 




i 




12 




3613L 265L 




i 


f 


13 




L5F 4217L 




{ 


5 


14 




40(13) LO(S) 




j 


! 


15 




42 (J ) L4(0P) 




Test: S < 

j 1 
1 


! 


16 




4219L 0020F 




; 


17 




4620L F1F 






! 
: 


18 




3619L 22F 






■ 
I 


19 




L5(0l) l4f 


by 16 (RF) 


Adjust operator 


I 


20 




40F 5020L 


by 17 (RF) 




! 


21 




26 (VI) 5021L • 








22 




26 (RN) L5(13) 




Reflect vector 




23 




4224L 0020F 








24 




4625L L1F 


by 23(RF) 






25 




40F L5(V) 


by 24(RF) 






26 




4628L 4l(l4) 








27 




L3(J) 3231L 








28 




L1F 001F 


by 26 (RF) 


Adjust column sums on 




29 




l4f 4of 


by 4(RF) 


Williams memory 




30 




L528L L4(15) 


«■ 






31 




4628L L529L 








32 




L4(15) 402% 








33 
34 
35 
36 

37 




F5(l4) 42 (14) 
'uO(j) 401F 
L31F 3231L 
L5(l4) IX) (N) 
36IL 2628L 

OOK 


. 


Residual communalities 


317 





(BC) 


K5F 4212L 


from 9(m4) 




'. 


1 




L5(C) 426L 







KSL 1.20 



LOCATION 


ORDER 


NOTES PAGE 9 


A.bs . 


Rel. 


Sym. 


427L L5(S) 






! 


2 




! 

i 

i 


3 




42% 46% 






i 

i 


4 




4i(K) 50(0) 








5 
6 




50F 7JF 
401F L5F 


by 3(RC) 
by 1(RC) 


„ (k) ^ (k-i) . 2 

ii ~ ii " ik 


I 


7 




L01F 40F 


by 2(RC) 






8 




L5% IA(15) 






\ 


9 




40% F5oL 






i 


10 
11 




42bL 4-2 7L 

F5(k) 42 (k) 






i 
i 

! 

i 


12 
13 




LD(n) 32F' 
2o5L OOF 

00335K (PR)(I2 


) 




1 :;-5 




,(R1) 


00335K 
OOK 




Square root routine 
Calculate factor 


7 M 

! 

8 




1 


(CL) 


Kr)F 4222 L 
L5(C) 466L 


from 4(m4) 


loadings 


i 

j 

f 

i 


2 

3 

1+ 

5 


' 


L")(S) 42dL 
42 7L 4ol7L 
421 8l 4l (14) 
41 (K) ^I(J) 








6 

7 


(13) 


L>F L4F 

io4f 4of 


by 1 and 2L 
by 3L 


/ \ -2 -4 
(C. + S.) x 10 x 2 


i 


8 




104f L4(l4) 








9 
10 

11 




40(14-) Lp6L 
L4(15) 406L 
427LF5(K) 




Sum of (C J + S . ) x 10"* 

-8 J ^ 
x 2 ° at (14) 


i 


12 


(ioi?; 


42 (X) 1.0 (N) 






i5 




;,'6i4L 2o6l 






I 11 * 




L5(l4) 3215L 






i 


15 




2t,(l6) 5015L 




Test: (l4) < 0; if positive 


i 


16 




26 (Rl) 4o(i4) 




take square root of (l4) 


i 


17 




L5F 66 (14) 






[ 


18 




S5F 40F 


by 4(CL) 


IfiJxlO- 1 1 




19 




F518L 4218L 
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Abs. 


Rel, 


Sym. 


0020F 4617L 








20 






21 




F5(J) 42 (J) 








22 




LO(N) 32F 








23 




2617L OOF 
OOK 




Print factor loadings 


568 



1 
2 
3 


(PL) 


K5F 4225L 
L5(0P) 426L 
L5(S) 427L 
4215L 4l(l4) 


from 5(*&) 






4 




L3(D) 3617L 




Test: (D) = 




5 




L5(D) 468L 








6 




4l(K) L5F 


by l(FL) " 


Test operator: print 4- f ., 01 




7 




3215L L1F 








8 




52F 508L 








9 




26 (Pi) 92131F 








10 




F56L 4-26L 








11 




F57L 427L 








12 




4215L F5(K) 








13 




42 (K) LO(N) 








14 




3216L 226L 








15 




OOF L5F 


from 7(FL) 






16 




228L 92770F 








17 




41 (K) L5(S) 








18 




4220L 4620L 








19 




2L20L S5F 








20 




50F 74f 


by 18 (PL) 






21 




102F L4(l4) 




Sum of squares of 




22 




40(14) L520L 




factor loadings 




23 




L4(15) 4020L 








24 




F5(K) 42 (K) 








25 




LO(N) 32F 








26 




2219L OOF 
00400K (P0)(I1 


) 


To calculate residual 


l+OO 





(RH) 


K5F 42 3L 


from 10 (M4) 


correlations 




1 




41 (J) 41 (I) 
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&bs. ] 


Rel. Sym. 


F5(J) 42 (j) 










2 








'3 




LO(N) 32F 










4 




L5(S) 422% 




Take triangular matrix 






5 




IA(J) 0020F 




off drum, a row at a 




1 

i 


6 




462% L5(V) 




time, and calculate 




\ 

i 
I 

i 


7 
8 




42l6L 4226L 
4232L 4626L 




r 00 _ r (k-D 




I 
* 

i 


9 




in (I) L5(J) 








i 
1 


10 




L0(4) 3221L 




- f f 
ik jk 




i 


11 




50 (J) 75 (T) 








I J !2 




L5.(D1) IMJ) 




then replace on drum 




i I 13 




S4F 4015L 








. 1 lif 




IA(8) 4033L 








| 1 15 




OOF OOF 


by 13 (RR) 


drum address 






16 


3216L 40F 


by 7(RR) 








IT 




F513L 401% 










18 




F516L 42l6L 




' 




i. 


19 
20 
21 




F5(I) 42 (i) 
LO(J) 3224L 
2615L 50 (J ) 








k 


22 




75 (T) 001F 








i 


23 
2k 

25 
26 

27 

28 
29 
30 


(Nl) 


L5(D2) 2212L 
OOF 4l(l) 
50F 71F 
L4F 40F 
F525L 422% 
L526L IA(15) 
1+026L F5(l) 
42 (i) LO(J) 


by 6(RR) 
by 7(BR) 








51 1 


3632L 262% 










32 




41 (I) L5F 


by 8(RR) 






; 


33 




OOF OOF 


by l4(RR) 


drum address 




! 


34 
35 




F532L 4232L 
F533L 4033L 








I 36 




F5(I) 42(1) 
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Rel. 


Sym. 


LO(J) 362L 








37 






38 




2232L OOF 
00911K 




Store Drum Set I 


911 







J0335F 50L 






. 


1 

2 




26(H) 0O2792F 
006lF 263L 








3 




J0400F 503L 






: 
1 


4 




26 (Yl) 002858F 








5 




0040F 26999F 












26911N 






t 






00335K 




Input communelities tape 


" 



1 
2 


(12) 


L5(C) 46(6) 
463L 428L 
429L 41 (J) . 


from 29(11) 






3 




50F 503L 








if 




26(N12) L52l(N12) 




1 

1 


5 




L0(6) 1020F 






1 


6 




40 (N) F0(0) 




Store order of matrix at (N) 




7 




40(12) 41.(1) 






\ 
I 


8 

9 
10 




41(11) 50F 
75(1) 40F 
102F L4(ll) 




CjXIO- 2 




11 




40(11) F58L 




Sum of C x 10*" 2 x 2* 2 

at (u; 


| 


12 




428L 429L 




J 


13 




F5(J) 42 (J) 






I 


14 




LO(N) 34(16) 




Stop for insertion of R-tape 


1 
t 

\ 


15 




228L OOF 
COK 




Input correlations tape 


j ?>l 





(13) 


L50O 4b JUL 


from (16) 




f 


1 




L4(.I3) 46(6) 






I 


2 
3 




L5('7) 4022 (N12) 
50 F 50 }L | 




i I k 




2o(K12) 222 (Nl) 




V 

i 




U j 


■ 
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Abs. 


Bel. 


8y»» 


00K 


■ 


Input routine (W\?) 


356 




(KL2) 








OOK 






395 




(16) 


ifl(j) 26(13) 
00400K 


from 14(12) 




400 





(11) 


192F 401F 


from 5 (Ml) 


Input parameters i f space 




1 




L5(3) 428L 




CLp space 




2 




4lF 9l4F 




d space 




3 




525L 222L 








4 




9l4F 525L 








5 




268L 50F 








6 




7^(10) S5F 








7 




40F 264L 








8 




L5F 40F 


by 1(11) 




. 


9 
10 

H 
12 




F58L 428L 
L51F l4if 
401F 362L 
L5(D0) fo(t)' 








13 




4o(di) F5(T) 




T&rm (Dl) and (D2) 




14 




40F 50F 








15 




75F L5(D0) 








16 




lo(t) sof 








17 
18 

19 
20 
21 




4o(D2) L3(D) 

3621L .50(d)' 

75(10) K5F 
0020F 46(D) 
L3(R) 3629L 




Calculate print parameter 




22 




L5(R) L4(3) 






> 


23 




008F 40F 








24 




L5(5) 66F 








25 




S5F 1031F 








26 




40(9) 50(R) 




Store number of residuals 




27 




75(10) K5F 




per line at (9) 




28 




0020F 46 (r) 








29 




24(12) OOF 




Transfer to C. input 


L_ 
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3 
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5 
6 

7 
8 

9 
10 
11 
12 
13 
14 
15 
l6 
17 
18 

19 
20 

21 
22 

23 
2k 

25 

2t' 

27 
28 

29 


1 
2 
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(HI) 



NOTES 



PAGE 14 



KSL 1.20 



OOK 

L4(N12) 4621 (^L2) fram(N12) 

L5(6) L02l(N12) 
i 

3623 (N12) L5(6) 

IA(N12) 46(6) 

1020F 4228L 

4229L F5(S) 

428L 429L 

4218L 4621 (N12) 

4l(l) 50F 

75(1) 40F |by 6(Nl) 

F58L 428L 

429L L028L 

328L F5(J) 

42(J) W(k) 

3625L 50(0) 

50 (J) 75 (T) 

L5(Dl) s4f 

l4(j) L4(8) 

4019L L5F 

OOF OOF [by l8L 

FyiiL 4019L 

F^lbL 42I8L: 

Lc^L >?i8L 

L-(J) IS (12) 

36 (*e) 2623 (N12) 

50 (j) 7!>(T) 

G01F L5(D2) 
2216L OOF 
Nl(l) ;>0F 



N01 



£F 



009HK 

J0335F 50L 

26 (Yl) 002660F 

006 3F 26 3L 



Addition to (102 ) to 
read in a triangular Matrix, 
to calculate drum 
addresses, and store 
on drum. 



r, . x 10 
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Ab«. 


Rel. 


Sy*. 


J0400F 503L 






i 


3 






If 




26 (Yl) 002726F 






5 




0062F 26999F 
269IIS 

00355K 






335 




(PR) 


L3(R) 362l(P0) 


Test: (R) * 








OOK 




Print residual 


336 







15 (R) 466L 




correlations 




1 
2 
3 




4630L 9259F ' 
92135F L5(C) 
424L 4l(j) 








4 




4l(l) 50F 


by 3L 






5 




75(2) 004F 








6 




52F 506L 


• 






T 




26 (EL) 92135F 








8 




92519F F5^L 








9 




424L F5(J) 








10 




42(j) LO(N) 








11 




36 (po) 4l(l) 








12 




: L5(V) 4219L 








13 




4228L L5(J) 








14 

15 
16 

17 




L0(4) 3224L 
■50(J) 75(T) 
L5(Dl) L4(j) 
S4F 4018L 








18 




QOF OOF 


by 17L 


Drum address 




19 




3219L 40F 


by 12L 






20 




F518L 4018L 








21 




F519L 4219L 








22 




F5(I) 42(1) 








23 




L0(j) 3227L 








24 




2618L 50 (J) 








25 




75 (T) 001F 








26 




L5(D2) 2216L 








27 




OOF 4l(l) 








28 




41 (K) 50F 


by 13L 


. 
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Abs. 


Rel«i 


BQfin* 


75(2) 004F 




1 




29 






50 




52F 5030L 








31 




26 (Pi) F5(K) 








32 




42 (K) L0(9) 








33 




3634L 2235L 








34 




92131F 92519F 








35 




4l(K) F528L 








36 




4228L F5(l) 








37 




42(1) LO(j) 








38 




324L 2228L 












00400K 






k-OQ 



1 
2 


(FO) 


92981F 9259F 
92135F 4l(l) 
922F 922F 


from 347F 


Print operator tape 




3 




L5(17) 466 (Fl) 






4 




L5(l8) L0(15)| 






5 




4222 (EL) I^(Qp) 






6 




1020F 4210L 






^ 


7 
8 

9 




J033F 507L 

26 (el) 92131F 

L512L 1020F 




• 




10 




4222 (EL) L5F 








11 




42 (J) 828F 








12 
13 




92898F L5(J) 
J055F 5013L 








14 




26(Pl) 9213H 








15 
16 

17 
18 

19 
20 




F510L 4210L 
F5(I) 42(1) 
LO(n) 3218L 
2210L 92130F 
92258F 925861 
92770F 92983J 








21 




921001F L5(0P) 






22 




422 3L L4(N) I 
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JtaM pAobi? 


Aba* 


Bel. 


8711. 


4227L klF 








23 




' 


24 




F523L 4223L 






1 


25 




L027L 35223L 






1 


26 




26(ML) OOF 






1 

I • 

! 


27 




N227L 4lF 






\ 

i 

i 






009HK 




Store Drum Set HI 




o 




J0335F 50L 






t 

i 
t 

j 

1 


1 
2 
3 

5 




26 (Yl) 002990F 
OO^OF 263L 
JO^OOF 503L 
26 (Yl) 003056F 
0030F 26 (ML) 






s 

1 
I 






269HN 

• 
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